                      (         TEMP.ASM):00001                 opt     forwardrefmax
                      (         TEMP.ASM):00002         ; Function file loaded: MAIN.TXT        
                      (         TEMP.ASM):00003                 OPT     CD
                      (         TEMP.ASM):00004                 OPT     6809
                      (         TEMP.ASM):00005                 ORG     $4000
                      (         TEMP.ASM):00006         ; 8950 baud is 100 cycles per write
4000 FC4063           (         TEMP.ASM):00007 [6]     START   LDD     WORD
4003 C30001           (         TEMP.ASM):00008 [4]             ADDD    #1
4006 FD4063           (         TEMP.ASM):00009 [6]             STD     WORD
4009 FD0400           (         TEMP.ASM):00010 [6]             STD     $400    ;ON SCREEN
400C 8E4067           (         TEMP.ASM):00011 [3]             LDX     #TEXT
400F 7FFF20           (         TEMP.ASM):00012 [7]             CLR     $FF20
4012 A680             (         TEMP.ASM):00013 [4+2]   LOOP1   LDA     ,X+
4014 273F             (         TEMP.ASM):00014 [3]             BEQ     DONE    ;0 terminated string
4016 C608             (         TEMP.ASM):00015 [2]             LDB     #8
4018 12               (         TEMP.ASM):00016 [2]     LOOP2   NOP
4019 12               (         TEMP.ASM):00017 [2]             NOP
401A 12               (         TEMP.ASM):00018 [2]             NOP
401B 12               (         TEMP.ASM):00019 [2]             NOP
401C 12               (         TEMP.ASM):00020 [2]             NOP     ;clear 10 cycles
401D 46               (         TEMP.ASM):00021 [2]             RORA
401E 78FF20           (         TEMP.ASM):00022 [7]             LSL     $FF20
4021 78FF20           (         TEMP.ASM):00023 [7]             LSL     $FF20   ;write bit
4024 108E0005         (         TEMP.ASM):00024 [4]             LDY     #5      ;needs adjustment
4028 313F             (         TEMP.ASM):00025 [4+1]   LOOP3   LEAY    -1,Y
402A 108C0000         (         TEMP.ASM):00026 [5]             CMPY    #0
402E 22F8             (         TEMP.ASM):00027 [3]             BHI     LOOP3
4030 5A               (         TEMP.ASM):00028 [2]             DECB
4031 26E5             (         TEMP.ASM):00029 [3]             BNE     LOOP2
                      (         TEMP.ASM):00030         ; stop bit 
4033 108E0001         (         TEMP.ASM):00031 [4]             LDY     #1
4037 12               (         TEMP.ASM):00032 [2]             NOP
4038 313F             (         TEMP.ASM):00033 [4+1]   LOOP4   LEAY    -1,Y
403A 108C0000         (         TEMP.ASM):00034 [5]             CMPY    #0
403E 22F8             (         TEMP.ASM):00035 [3]             BHI     LOOP4
4040 8602             (         TEMP.ASM):00036 [2]             LDA     #2
4042 B7FF20           (         TEMP.ASM):00037 [5]             STA     $FF20   ;stop bit write
4045 108E0004         (         TEMP.ASM):00038 [4]             LDY     #4
4049 313F             (         TEMP.ASM):00039 [4+1]   LOOP5   LEAY    -1,Y
404B 108C0000         (         TEMP.ASM):00040 [5]             CMPY    #0
404F 22F8             (         TEMP.ASM):00041 [3]             BHI     LOOP5
4051 12               (         TEMP.ASM):00042 [2]             NOP
4052 12               (         TEMP.ASM):00043 [2]             NOP
4053 20BD             (         TEMP.ASM):00044 [3]             BRA     LOOP1   ;back to next bit
4055 108E1388         (         TEMP.ASM):00045 [4]     DONE    LDY     #5000
4059 313F             (         TEMP.ASM):00046 [4+1]   LOOP6   LEAY    -1,Y
405B 108C0000         (         TEMP.ASM):00047 [5]             CMPY    #0
405F 22F8             (         TEMP.ASM):00048 [3]             BHI     LOOP6
4061 209D             (         TEMP.ASM):00049 [3]             BRA     START
4063 00000000         (         TEMP.ASM):00050         WORD    FDB     0,0
4067 48454C4C4F20574F (         TEMP.ASM):00051         TEXT    FCN     "HELLO WORLD HOW ARE YOU TODAY"
     524C4420484F5720
     41524520594F5520
     544F44415900
                      (         TEMP.ASM):00052                 END     START
